\(\int \frac {1}{(a-i a x)^{13/4} (a+i a x)^{3/4}} \, dx\) [1188]

   Optimal result
   Rubi [A] (verified)
   Mathematica [A] (verified)
   Maple [A] (verified)
   Fricas [A] (verification not implemented)
   Sympy [F(-1)]
   Maxima [F]
   Giac [F(-2)]
   Mupad [F(-1)]

Optimal result

Integrand size = 25, antiderivative size = 100 \[ \int \frac {1}{(a-i a x)^{13/4} (a+i a x)^{3/4}} \, dx=-\frac {2 i \sqrt [4]{a+i a x}}{9 a^2 (a-i a x)^{9/4}}-\frac {8 i \sqrt [4]{a+i a x}}{45 a^3 (a-i a x)^{5/4}}-\frac {16 i \sqrt [4]{a+i a x}}{45 a^4 \sqrt [4]{a-i a x}} \]

[Out]

-2/9*I*(a+I*a*x)^(1/4)/a^2/(a-I*a*x)^(9/4)-8/45*I*(a+I*a*x)^(1/4)/a^3/(a-I*a*x)^(5/4)-16/45*I*(a+I*a*x)^(1/4)/
a^4/(a-I*a*x)^(1/4)

Rubi [A] (verified)

Time = 0.01 (sec) , antiderivative size = 100, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.080, Rules used = {47, 37} \[ \int \frac {1}{(a-i a x)^{13/4} (a+i a x)^{3/4}} \, dx=-\frac {16 i \sqrt [4]{a+i a x}}{45 a^4 \sqrt [4]{a-i a x}}-\frac {8 i \sqrt [4]{a+i a x}}{45 a^3 (a-i a x)^{5/4}}-\frac {2 i \sqrt [4]{a+i a x}}{9 a^2 (a-i a x)^{9/4}} \]

[In]

Int[1/((a - I*a*x)^(13/4)*(a + I*a*x)^(3/4)),x]

[Out]

(((-2*I)/9)*(a + I*a*x)^(1/4))/(a^2*(a - I*a*x)^(9/4)) - (((8*I)/45)*(a + I*a*x)^(1/4))/(a^3*(a - I*a*x)^(5/4)
) - (((16*I)/45)*(a + I*a*x)^(1/4))/(a^4*(a - I*a*x)^(1/4))

Rule 37

Int[((a_.) + (b_.)*(x_))^(m_.)*((c_.) + (d_.)*(x_))^(n_), x_Symbol] :> Simp[(a + b*x)^(m + 1)*((c + d*x)^(n +
1)/((b*c - a*d)*(m + 1))), x] /; FreeQ[{a, b, c, d, m, n}, x] && NeQ[b*c - a*d, 0] && EqQ[m + n + 2, 0] && NeQ
[m, -1]

Rule 47

Int[((a_.) + (b_.)*(x_))^(m_)*((c_.) + (d_.)*(x_))^(n_), x_Symbol] :> Simp[(a + b*x)^(m + 1)*((c + d*x)^(n + 1
)/((b*c - a*d)*(m + 1))), x] - Dist[d*(Simplify[m + n + 2]/((b*c - a*d)*(m + 1))), Int[(a + b*x)^Simplify[m +
1]*(c + d*x)^n, x], x] /; FreeQ[{a, b, c, d, m, n}, x] && NeQ[b*c - a*d, 0] && ILtQ[Simplify[m + n + 2], 0] &&
 NeQ[m, -1] &&  !(LtQ[m, -1] && LtQ[n, -1] && (EqQ[a, 0] || (NeQ[c, 0] && LtQ[m - n, 0] && IntegerQ[n]))) && (
SumSimplerQ[m, 1] ||  !SumSimplerQ[n, 1])

Rubi steps \begin{align*} \text {integral}& = -\frac {2 i \sqrt [4]{a+i a x}}{9 a^2 (a-i a x)^{9/4}}+\frac {4 \int \frac {1}{(a-i a x)^{9/4} (a+i a x)^{3/4}} \, dx}{9 a} \\ & = -\frac {2 i \sqrt [4]{a+i a x}}{9 a^2 (a-i a x)^{9/4}}-\frac {8 i \sqrt [4]{a+i a x}}{45 a^3 (a-i a x)^{5/4}}+\frac {8 \int \frac {1}{(a-i a x)^{5/4} (a+i a x)^{3/4}} \, dx}{45 a^2} \\ & = -\frac {2 i \sqrt [4]{a+i a x}}{9 a^2 (a-i a x)^{9/4}}-\frac {8 i \sqrt [4]{a+i a x}}{45 a^3 (a-i a x)^{5/4}}-\frac {16 i \sqrt [4]{a+i a x}}{45 a^4 \sqrt [4]{a-i a x}} \\ \end{align*}

Mathematica [A] (verified)

Time = 7.97 (sec) , antiderivative size = 52, normalized size of antiderivative = 0.52 \[ \int \frac {1}{(a-i a x)^{13/4} (a+i a x)^{3/4}} \, dx=\frac {2 \sqrt [4]{a+i a x} \left (17 i+20 x-8 i x^2\right )}{45 a^4 (i+x)^2 \sqrt [4]{a-i a x}} \]

[In]

Integrate[1/((a - I*a*x)^(13/4)*(a + I*a*x)^(3/4)),x]

[Out]

(2*(a + I*a*x)^(1/4)*(17*I + 20*x - (8*I)*x^2))/(45*a^4*(I + x)^2*(a - I*a*x)^(1/4))

Maple [A] (verified)

Time = 0.19 (sec) , antiderivative size = 43, normalized size of antiderivative = 0.43

method result size
gosper \(-\frac {2 \left (x +i\right ) \left (-x +i\right ) \left (8 i x^{2}-20 x -17 i\right )}{45 \left (-i a x +a \right )^{\frac {13}{4}} \left (i a x +a \right )^{\frac {3}{4}}}\) \(43\)
risch \(\frac {\frac {16}{45} x^{3}+\frac {8}{15} i x^{2}+\frac {2}{15} x +\frac {34}{45} i}{a^{3} \left (a \left (i x +1\right )\right )^{\frac {3}{4}} \left (-a \left (i x -1\right )\right )^{\frac {1}{4}} \left (x +i\right )^{2}}\) \(50\)

[In]

int(1/(a-I*a*x)^(13/4)/(a+I*a*x)^(3/4),x,method=_RETURNVERBOSE)

[Out]

-2/45*(x+I)*(-x+I)*(8*I*x^2-17*I-20*x)/(a-I*a*x)^(13/4)/(a+I*a*x)^(3/4)

Fricas [A] (verification not implemented)

none

Time = 0.22 (sec) , antiderivative size = 57, normalized size of antiderivative = 0.57 \[ \int \frac {1}{(a-i a x)^{13/4} (a+i a x)^{3/4}} \, dx=\frac {2 \, {\left (i \, a x + a\right )}^{\frac {1}{4}} {\left (-i \, a x + a\right )}^{\frac {3}{4}} {\left (8 \, x^{2} + 20 i \, x - 17\right )}}{45 \, {\left (a^{5} x^{3} + 3 i \, a^{5} x^{2} - 3 \, a^{5} x - i \, a^{5}\right )}} \]

[In]

integrate(1/(a-I*a*x)^(13/4)/(a+I*a*x)^(3/4),x, algorithm="fricas")

[Out]

2/45*(I*a*x + a)^(1/4)*(-I*a*x + a)^(3/4)*(8*x^2 + 20*I*x - 17)/(a^5*x^3 + 3*I*a^5*x^2 - 3*a^5*x - I*a^5)

Sympy [F(-1)]

Timed out. \[ \int \frac {1}{(a-i a x)^{13/4} (a+i a x)^{3/4}} \, dx=\text {Timed out} \]

[In]

integrate(1/(a-I*a*x)**(13/4)/(a+I*a*x)**(3/4),x)

[Out]

Timed out

Maxima [F]

\[ \int \frac {1}{(a-i a x)^{13/4} (a+i a x)^{3/4}} \, dx=\int { \frac {1}{{\left (i \, a x + a\right )}^{\frac {3}{4}} {\left (-i \, a x + a\right )}^{\frac {13}{4}}} \,d x } \]

[In]

integrate(1/(a-I*a*x)^(13/4)/(a+I*a*x)^(3/4),x, algorithm="maxima")

[Out]

integrate(1/((I*a*x + a)^(3/4)*(-I*a*x + a)^(13/4)), x)

Giac [F(-2)]

Exception generated. \[ \int \frac {1}{(a-i a x)^{13/4} (a+i a x)^{3/4}} \, dx=\text {Exception raised: TypeError} \]

[In]

integrate(1/(a-I*a*x)^(13/4)/(a+I*a*x)^(3/4),x, algorithm="giac")

[Out]

Exception raised: TypeError >> an error occurred running a Giac command:INPUT:sage2:=int(sage0,sageVARx):;OUTP
UT:The choice was done assuming 0=[0,0]ext_reduce Error: Bad Argument TypeDone

Mupad [F(-1)]

Timed out. \[ \int \frac {1}{(a-i a x)^{13/4} (a+i a x)^{3/4}} \, dx=\int \frac {1}{{\left (a-a\,x\,1{}\mathrm {i}\right )}^{13/4}\,{\left (a+a\,x\,1{}\mathrm {i}\right )}^{3/4}} \,d x \]

[In]

int(1/((a - a*x*1i)^(13/4)*(a + a*x*1i)^(3/4)),x)

[Out]

int(1/((a - a*x*1i)^(13/4)*(a + a*x*1i)^(3/4)), x)